Código fuente de 'Multibuscador de Internet.asp'

<html>
<head>
<title>Multibuscador de Internet - Códigos asp, programacion asp, descargas asp, rutinas asp</title>
</head>
<p align="center"><b>
<font size="3">Multibuscador de Internet</font></b>
<body style="font-family: Arial; font-size: 11pt">
   
    </p>
    
    <form action="Multibuscador de Internet.asp" method=post> 
    <table border=0 cellpadding=5 width="358" align=center><tr> 
    <td align=center> 
    <input size=30 name=zer value="Astalaweb"><BR> 
    <select name="se">
    <option value="1">Yahoo
    <option value="2">Lycos
    <option value="3">Google
    <option value="4">Msn
    <input type=submit value="Search"> 
    </td></tr> 
    <td align=center> 
    <p align="left"> 
    </td></tr> 
    </table> 
    </form>

    
    <% AA=request.form("zer") 
    AA=server.urlencode (AA) 
    if request.form ("se")="1" then 
    response.redirect ("http://search.yahoo.com/bin/search?p="+AA) 
    else 
    
    if request.form ("se")="2" then 
    response.redirect ("http://www.lycos.com/cgi-bin/pursuit?query="+AA) 
    end if  
    if request.form ("se")="3" then 
    response.redirect ("http://www.google.com/search?q="+AA) 
    end if  
    if request.form ("se")="4" then 
    response.redirect ("http://search.msn.es/results.aspx?FORM=SMCRT&q="+AA) 
    end if  
    end if 
    %>
    
    </body>
    </html>